##
## Attaching package: 'dplyr'
## The following objects are masked from 'package:data.table':
##
## between, first, last
## The following objects are masked from 'package:stats':
##
## filter, lag
## The following objects are masked from 'package:base':
##
## intersect, setdiff, setequal, union
##
## Attaching package: 'qqplotr'
## The following objects are masked from 'package:ggplot2':
##
## stat_qq_line, StatQqLine
##
## Attaching package: 'gridExtra'
## The following object is masked from 'package:dplyr':
##
## combine
# EXPLORATORY FOR TRIP.TOTAL BY COMPANY
# max by company
data[,max(Trip.Total),by=Company]
## Company V1
## 1: Top Cab Affiliation 861.72
## 2: Blue Ribbon Taxi Association Inc. 6666.66
## 3: Taxi Affiliation Services 9955.55
## 4: Sun Taxi 1269.25
## 5: Medallion Leasin 9226.18
## 6: City Service 9004.25
## 7: Chicago Independents 9300.25
## 8: Chicago Carriage Cab Corp 7549.40
## 9: Star North Management LLC 1100.25
## 10: Flash Cab 5914.00
## 11: Petani Cab Corp 500.01
## 12: Taxicab Insurance Agency, LLC 970.37
## 13: Choice Taxi Association 813.50
## 14: Patriot Taxi Dba Peace Taxi Associat 675.50
## 15: Chicago Medallion Management 203.00
## 16: 24 Seven Taxi 520.75
## 17: KOAM Taxi Association 188.00
## 18: 312 Medallion Management Corp 599.86
## 19: Suburban Dispatch LLC 5321.20
## 20: Chicago Taxicab 9900.27
## 21: Nova Taxi Affiliation Llc 526.50
## 22: Taxi Affiliation Service Yellow 311.25
## 23: Blue Diamond 141.60
## 24: Setare Inc 211.89
## 25: 6743 - 78771 Luhak Corp 106.75
## 26: Metro Jet Taxi A 9900.26
## 27: Leonard Cab Co 487.50
## 28: 5062 - 34841 Sam Mestas 141.00
## 29: 4053 - 40193 Adwar H. Nikola 107.50
## 30: 3011 - 66308 JBL Cab Inc. 114.25
## 31: U Taxicab 1746.75
## 32: 3094 - 24059 G.L.B. Cab Co 62.75
## 33: 5 Star Taxi 209.06
## 34: 2092 - 61288 Sbeih company 80.00
## 35: 3556 - 36214 RC Andrews Cab 146.25
## 36: 6742 - 83735 Tasha ride inc 67.75
## 37: 1085 - 72312 N and W Cab Co 88.00
## 38: 2733 - 74600 Benny Jona 348.00
## 39: 5874 - 73628 Sergey Cab Corp. 171.50
## 40: 3620 - 52292 David K. Cab Corp. 126.10
## 41: 4787 - 56058 Reny Cab Co 54.00
## 42: Checker Taxi Affiliation 302.75
## 43: 5006 - 39261 Salifu Bawa 120.50
## 44: 4623 - 27290 Jay Kim 320.20
## 45: 6574 - Babylon Express Inc. 152.50
## 46: 3623 - 72222 Arrington Enterprises 106.50
## 47: 3721 - Santamaria Express, Alvaro Santamaria 96.75
## 48: 3591 - 63480 Chuks Cab 192.75
## 49: 4523 - 79481 Hazel Transit Inc 87.90
## 50: CMT-Sales 3.00
## 51: Globe Taxi 842.00
## 52: Metro Jet Cab Association Inc. 1000.77
## Company V1
data %>%
group_by(Company) %>%
summarise(max(Trip.Total),n=n())
## # A tibble: 52 x 3
## Company `max(Trip.Total)` n
## <chr> <dbl> <int>
## 1 1085 - 72312 N and W Cab Co 88 903
## 2 2092 - 61288 Sbeih company 80 621
## 3 24 Seven Taxi 521. 31615
## 4 2733 - 74600 Benny Jona 348 918
## 5 3011 - 66308 JBL Cab Inc. 114. 2164
## 6 3094 - 24059 G.L.B. Cab Co 62.8 680
## 7 312 Medallion Management Corp 600. 6028
## 8 3556 - 36214 RC Andrews Cab 146. 1648
## 9 3591 - 63480 Chuks Cab 193. 1652
## 10 3620 - 52292 David K. Cab Corp. 126. 420
## # … with 42 more rows
# mean by company
data[,mean(Trip.Total),by=Company]
## Company V1
## 1: Top Cab Affiliation 18.519197
## 2: Blue Ribbon Taxi Association Inc. 13.999520
## 3: Taxi Affiliation Services 16.610239
## 4: Sun Taxi 18.428482
## 5: Medallion Leasin 19.656913
## 6: City Service 20.618256
## 7: Chicago Independents 20.499752
## 8: Chicago Carriage Cab Corp 16.689448
## 9: Star North Management LLC 17.963442
## 10: Flash Cab 17.113360
## 11: Petani Cab Corp 33.305028
## 12: Taxicab Insurance Agency, LLC 17.013807
## 13: Choice Taxi Association 16.263783
## 14: Patriot Taxi Dba Peace Taxi Associat 17.244195
## 15: Chicago Medallion Management 13.470327
## 16: 24 Seven Taxi 16.504790
## 17: KOAM Taxi Association 16.070746
## 18: 312 Medallion Management Corp 24.963273
## 19: Suburban Dispatch LLC 40.982465
## 20: Chicago Taxicab 63.869807
## 21: Nova Taxi Affiliation Llc 14.995876
## 22: Taxi Affiliation Service Yellow 22.405282
## 23: Blue Diamond 15.724369
## 24: Setare Inc 15.899738
## 25: 6743 - 78771 Luhak Corp 13.101604
## 26: Metro Jet Taxi A 298.146343
## 27: Leonard Cab Co 15.348714
## 28: 5062 - 34841 Sam Mestas 9.806841
## 29: 4053 - 40193 Adwar H. Nikola 36.594292
## 30: 3011 - 66308 JBL Cab Inc. 12.185342
## 31: U Taxicab 26.808670
## 32: 3094 - 24059 G.L.B. Cab Co 9.291912
## 33: 5 Star Taxi 26.718756
## 34: 2092 - 61288 Sbeih company 18.034863
## 35: 3556 - 36214 RC Andrews Cab 16.181432
## 36: 6742 - 83735 Tasha ride inc 13.053601
## 37: 1085 - 72312 N and W Cab Co 11.414275
## 38: 2733 - 74600 Benny Jona 33.560011
## 39: 5874 - 73628 Sergey Cab Corp. 20.182059
## 40: 3620 - 52292 David K. Cab Corp. 32.620238
## 41: 4787 - 56058 Reny Cab Co 10.333438
## 42: Checker Taxi Affiliation 17.969850
## 43: 5006 - 39261 Salifu Bawa 10.943324
## 44: 4623 - 27290 Jay Kim 35.977952
## 45: 6574 - Babylon Express Inc. 17.181725
## 46: 3623 - 72222 Arrington Enterprises 16.751207
## 47: 3721 - Santamaria Express, Alvaro Santamaria 20.509840
## 48: 3591 - 63480 Chuks Cab 10.363717
## 49: 4523 - 79481 Hazel Transit Inc 27.214103
## 50: CMT-Sales 1.166667
## 51: Globe Taxi 20.061017
## 52: Metro Jet Cab Association Inc. 21.775928
## Company V1
data %>%
group_by(Company) %>%
summarise(mean(Trip.Total),n=n())
## # A tibble: 52 x 3
## Company `mean(Trip.Total)` n
## <chr> <dbl> <int>
## 1 1085 - 72312 N and W Cab Co 11.4 903
## 2 2092 - 61288 Sbeih company 18.0 621
## 3 24 Seven Taxi 16.5 31615
## 4 2733 - 74600 Benny Jona 33.6 918
## 5 3011 - 66308 JBL Cab Inc. 12.2 2164
## 6 3094 - 24059 G.L.B. Cab Co 9.29 680
## 7 312 Medallion Management Corp 25.0 6028
## 8 3556 - 36214 RC Andrews Cab 16.2 1648
## 9 3591 - 63480 Chuks Cab 10.4 1652
## 10 3620 - 52292 David K. Cab Corp. 32.6 420
## # … with 42 more rows
# sum by company
data[,sum(Trip.Total),by=Company]
## Company V1
## 1: Top Cab Affiliation 1376920.85
## 2: Blue Ribbon Taxi Association Inc. 2272024.13
## 3: Taxi Affiliation Services 17502940.00
## 4: Sun Taxi 4669482.48
## 5: Medallion Leasin 4592051.52
## 6: City Service 4515996.05
## 7: Chicago Independents 1588197.76
## 8: Chicago Carriage Cab Corp 4606638.17
## 9: Star North Management LLC 2956153.88
## 10: Flash Cab 15406131.08
## 11: Petani Cab Corp 53987.45
## 12: Taxicab Insurance Agency, LLC 2402740.89
## 13: Choice Taxi Association 1451477.58
## 14: Patriot Taxi Dba Peace Taxi Associat 669609.33
## 15: Chicago Medallion Management 119549.15
## 16: 24 Seven Taxi 521798.93
## 17: KOAM Taxi Association 342081.89
## 18: 312 Medallion Management Corp 150478.61
## 19: Suburban Dispatch LLC 230075.56
## 20: Chicago Taxicab 1745242.48
## 21: Nova Taxi Affiliation Llc 425178.06
## 22: Taxi Affiliation Service Yellow 50859.99
## 23: Blue Diamond 13711.65
## 24: Setare Inc 193452.11
## 25: 6743 - 78771 Luhak Corp 13966.31
## 26: Metro Jet Taxi A 2506218.16
## 27: Leonard Cab Co 41410.83
## 28: 5062 - 34841 Sam Mestas 11081.73
## 29: 4053 - 40193 Adwar H. Nikola 8526.47
## 30: 3011 - 66308 JBL Cab Inc. 26369.08
## 31: U Taxicab 408242.43
## 32: 3094 - 24059 G.L.B. Cab Co 6318.50
## 33: 5 Star Taxi 125845.34
## 34: 2092 - 61288 Sbeih company 11199.65
## 35: 3556 - 36214 RC Andrews Cab 26667.00
## 36: 6742 - 83735 Tasha ride inc 8445.68
## 37: 1085 - 72312 N and W Cab Co 10307.09
## 38: 2733 - 74600 Benny Jona 30808.09
## 39: 5874 - 73628 Sergey Cab Corp. 10191.94
## 40: 3620 - 52292 David K. Cab Corp. 13700.50
## 41: 4787 - 56058 Reny Cab Co 5590.39
## 42: Checker Taxi Affiliation 10781.91
## 43: 5006 - 39261 Salifu Bawa 7802.59
## 44: 4623 - 27290 Jay Kim 20903.19
## 45: 6574 - Babylon Express Inc. 9364.04
## 46: 3623 - 72222 Arrington Enterprises 10268.49
## 47: 3721 - Santamaria Express, Alvaro Santamaria 6399.07
## 48: 3591 - 63480 Chuks Cab 17120.86
## 49: 4523 - 79481 Hazel Transit Inc 3184.05
## 50: CMT-Sales 7.00
## 51: Globe Taxi 206307.50
## 52: Metro Jet Cab Association Inc. 15722.22
## Company V1
data %>%
group_by(Company) %>%
summarise(sum(Trip.Total),n=n())
## # A tibble: 52 x 3
## Company `sum(Trip.Total)` n
## <chr> <dbl> <int>
## 1 1085 - 72312 N and W Cab Co 10307. 903
## 2 2092 - 61288 Sbeih company 11200. 621
## 3 24 Seven Taxi 521799. 31615
## 4 2733 - 74600 Benny Jona 30808. 918
## 5 3011 - 66308 JBL Cab Inc. 26369. 2164
## 6 3094 - 24059 G.L.B. Cab Co 6318. 680
## 7 312 Medallion Management Corp 150479. 6028
## 8 3556 - 36214 RC Andrews Cab 26667 1648
## 9 3591 - 63480 Chuks Cab 17121. 1652
## 10 3620 - 52292 David K. Cab Corp. 13700. 420
## # … with 42 more rows
























